home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Digital Photo Book 16: Sister 7
/
Digital Photo Book 16: Sister 7.iso
/
pc
/
DATA
/
main.dir
/
00013_Script_FILEOPEN
< prev
next >
Wrap
Text File
|
2004-11-20
|
717b
|
34 lines
property openfilename
global config
on mouseup
nn = config["PDF_NAME"]
if voidP(nn) then
nn = openfilename
end if
n = xtra("FileXtra4").new()
if the platform contains "Mac" then
app = n.fx_FileGetAppPath("PDF CARO")
else
app = n.fx_FileGetAppPath(".pdf")
end if
n = 0
if not ( app = "") then
if app.char[1] = QUOTE then
app = app.char[2..length(app)-1]
end if
open nn with app
end if
end
on getPropertyDescriptionList
p = [:]
p[#openfilename] = [:]
p[#openfilename][#comment] = "腴ヌ宰tノ@ノCノ"
p[#openfilename][#format] = #string
p[#openfilename][#default] = ""
return p
end getPropertyDescriptionList